﻿Imports DevExpress.LookAndFeel

Public Class Form111
    Public Sub New()
        InitializeComponent()
        DevExpress.UserSkins.BonusSkins.Register()
        DevExpress.Skins.SkinManager.EnableFormSkins()
        UserLookAndFeel.Default.SetSkinStyle("Money Twins")
        Me.setObj(Me.ErpharmaDataSet, Me.ErpharmaDataSet.cha, Me.ChaBindingSource, Me.TableAdapterManager, Me.ChaTableAdapter, Me.MaITextEdit, Me.GiaITextEdit)
        Me.setTab1(Me.ErpharmaDataSet.con, Me.FKconchaBindingSource, Me.ConTableAdapter)
        Me.setSoTab(2)
    End Sub
    Private Sub Form111_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Me.ConTableAdapter.Fill(Me.ErpharmaDataSet.con)
        Me.ChaTableAdapter.Fill(Me.ErpharmaDataSet.cha)
    End Sub

End Class
